Tigerインタプリタへ while を導入したい